PALIND.2[F80,JMC] - www.SailDart.org

perm filename PALIND.2[F80,JMC] blob sn#550185 filedate 1980-12-09 generic text, type T, neo UTF8

Q0():=1$
Q1(X1):=X1$
Q2(X1,X2):=X1*Q1(X2)+Q0()$
Q3(X1,X2,X3):=X1*Q2(X2,X3)+Q1(X3)$
Q4(X1,X2,X3,X4):=X1*Q3(X2,X3,X4)+Q2(X3,X4)$
Q5(X1,X2,X3,X4,X5):=X1*Q4(X2,X3,X4,X5)+Q3(X3,X4,X5)$
Q6(X1,X2,X3,X4,X5,X6):=X1*Q5(X2,X3,X4,X5,X6)+Q4(X3,X4,X5,X6)$
Q7(X1,X2,X3,X4,X5,X6,X7):=X1*Q6(X2,X3,X4,X5,X6,X7)+Q5(X3,X4,X5,X6,X7)$
Q8(X1,X2,X3,X4,X5,X6,X7,X8):=X1*Q7(X2,X3,X4,X5,X6,X7,X8)+Q6(X3,X4,X5,X6,X7,X8)$
Q9(X1,X2,X3,X4,X5,X6,X7,X8,X9):=X1*Q8(X2,X3,X4,X5,X6,X7,X8,X9)
+Q7(X3,X4,X5,X6,X7,X8,X9)$